﻿Namespace Errors
    Public Class ToolKitClientException
        Inherits System.Exception
        Implements IToolKit
        Public Sub New(ByVal Message As String)
            MyBase.New(Message)
            'Need to add a HResult
            'Me.HResult = ?
        End Sub
        Public Overrides Function ToString() As String Implements IToolKit.ToString
            Return Me.Message
        End Function
    End Class
End Namespace
